Linux Cubed Series 7: Sunsite/Linux Cubed Series 7 - Sunsite Vol 1.iso/system/network/daemons/nfs/nfs-serv.2be/nfs-serv/nfs-server-2.2beta16/logging.c

C/C++ Source or Header | 1996-02-13 | 4.2 KB | 187 lines

/*
 * logging    This module handles the logging of requests.
 *
 * TODO:    Merge the two "XXX_log() calls.
 *
 * Authors:    Donald J. Becker, <[e-mail]>
 *        Rick Sladkey, <[e-mail]>
 *        Fred N. van Kempen, <[e-mail]>
 *        Olaf Kirch, <[e-mail]>
 *
 *        This software maybe be used for any purpose provided
 *        the above copyright notice is retained.  It is supplied
 *        as is, with no warranty expressed or implied.
 */

#include "nfsd.h"

#ifdef HAVE_SYSLOG_H
#include <syslog.h>
#else
#define LOG_FILE    "/var/tmp/%s.log"
#endif

static int  logging = 0;        /* enable/disable DEBUG logs    */
static int  dbg_mask = D_GENERAL;    /* What will be logged        */
static char log_name[256];        /* name of this program        */
static FILE *log_fp = (FILE *)NULL;    /* fp for the log file        */

void log_open(progname, foreground)
char    *progname;
int    foreground;
{
#ifdef HAVE_SYSLOG_H
    openlog(progname, LOG_PID | LOG_NDELAY, LOG_DAEMON );
    if (foreground)
        log_fp = stderr;
#else
    if (!foreground) {
        log_fp = stderr;
    } else {
        char path[1024];

        sprintf(path, LOG_FILE, progname);
        logfile = path;
        if ((log_fp = fopen(path, "a")) == NULL)
            return;
    }
#endif
    if (log_fp != NULL)
        setbuf(log_fp, (char *) NULL);

    sprintf(log_name, "%s[%d]", progname, getpid());
}

void toggle_logging(sig)
int    sig;
{
    (void) signal(sig, toggle_logging);
    dprintf(D_GENERAL, "turned off logging\n");
    logging = 1 - logging;
    dprintf(D_GENERAL, "turned on logging\n");
}

void enable_logging(kind)
char    *kind;
{
    if ('a' == *kind && !strcmp(kind, "auth"))
        dbg_mask |= D_AUTH;
    else if ('c' == *kind && !strcmp(kind, "call"))
        dbg_mask |= D_CALL;
    else if ('f' == *kind && !strcmp(kind, "fhcache"))
        dbg_mask |= D_FHCACHE;
    else if ('f' == *kind && !strcmp(kind, "fhtrace"))
        dbg_mask |= D_FHTRACE;
    else if ('r' == *kind && !strcmp(kind, "rmtab"))
        dbg_mask |= D_RMTAB;
    else if ('s' == *kind && !strcmp(kind, "stale"))
        dbg_mask |= D_AUTH | D_CALL | D_FHCACHE | D_FHTRACE;
    else if ('u' == *kind && !strcmp(kind, "ugid"))
        dbg_mask |= D_UGID;
    else
        fprintf (stderr, "Invalid debug facility: %s\n", kind);
    logging = 1;
}

int logging_enabled(level)
int    level;
{
    return (logging && (level & dbg_mask));
}


/* Write something to the system logfile. */
#ifdef __STDC__
void dprintf(int kind, const char *fmt, ...)
#else
void dprintf(kind, fmt, va_alist)
int    kind;
char    *fmt;
va_dcl
#endif
{
    char buff[1024];
    va_list args;
    time_t now;
    struct tm *tm;

    if (!(kind & (L_FATAL | L_ERROR | L_WARNING))
     && !(logging && (kind & dbg_mask)))
        return;

#ifdef __STDC__
    va_start(args, fmt);
#else
    va_start(args);
#endif
#ifdef HAVE_VPRINTF
    vsprintf(buff, fmt, args);
#else
    /* Figure out how to use _doprnt here. */
#endif
    va_end(args);

#ifdef HAVE_SYSLOG_H
    if (kind & (L_FATAL | L_ERROR)) {
        (void) syslog(LOG_ERR, "%s", buff);
    } else if (kind & L_WARNING) {
        (void) syslog(LOG_WARNING, "%s", buff);
    } else if (kind & L_NOTICE) {
        (void) syslog(LOG_NOTICE, "%s", buff);
    } else if (log_fp == NULL) {
        (void) syslog(LOG_DEBUG, "%s", buff);
    }
#endif
    if (log_fp != (FILE *) NULL) {
        (void) time(&now);
        tm = localtime(&now);
        fprintf(log_fp, "%s %02d/%02d/%02d %02d:%02d %s",
              log_name, tm->tm_mon + 1, tm->tm_mday, tm->tm_year,
            tm->tm_hour, tm->tm_min, buff);
    }

    if (kind & L_FATAL)
        exit(1);
}

/* Log an incoming call. */
void log_call(rqstp, xname, arg)
struct svc_req *rqstp;
char *xname;
char *arg;
{
    char buff[1024];
    register char *sp;
    int i;

    if (!logging || !(dbg_mask & D_CALL))
        return;

    sp = buff;
    sprintf(sp, "%s [%d ", xname, rqstp->rq_cred.oa_flavor);
    sp += strlen(sp);
    if (rqstp->rq_cred.oa_flavor == AUTH_UNIX) {
        struct authunix_parms *unix_cred;
        struct tm *tm;

        unix_cred = (struct authunix_parms *) rqstp->rq_clntcred;
        tm = localtime(&unix_cred->aup_time);
        sprintf(sp, "%d/%d/%d %02d:%02d:%02d %s %d.%d",
            tm->tm_year, tm->tm_mon + 1, tm->tm_mday,
            tm->tm_hour, tm->tm_min, tm->tm_sec,
            unix_cred->aup_machname,
            unix_cred->aup_uid,
            unix_cred->aup_gid);
        sp += strlen(sp);
        if ((int) unix_cred->aup_len > 0) {
            sprintf(sp, "+%d", unix_cred->aup_gids[0]);
            sp += strlen(sp);
            for (i = 1; i < unix_cred->aup_len; i++) {
                sprintf(sp, ",%d", unix_cred->aup_gids[i]);
                sp += strlen(sp);
            }
        }
    }
    dprintf(D_CALL, "%s]\n\t%s\n", buff, arg);
}